@echo ##### Delete unused files #####
@if exist *.bak del *.bak
rem @if exist *.dsw del *.dsw
@if exist *.~* del *.~*
@if exist *.obj del *.obj
@if exist *.obr del *.obr
::@if exist *.res del *.res
@if exist *.rws del *.rws
@if exist *.csm del *.csm
@if exist *.ilc del *.ilc
@if exist *.ild del *.ild
@if exist *.ilf del *.ilf
@if exist *.ils del *.ils
@if exist *.mbt del *.mbt
@if exist *.mrt del *.mrt
@if exist *.r$p del *.r$p
@if exist *.tds del *.tds

@if exist *.pch del *.pch
@if exist *.idb del *.idb
@if exist *.exp del *.exp
@if exist *.ncb del *.ncb
@if exist *.plg del *.plg
rem @if exist *.opt del *.opt

@echo ##### for VxD #####
@if exist *.map del *.map
@if exist *.pel del *.pel

@echo ##### for Delphi ####
@if exist *.dcu del *.dcu

@tdstrip *.dll
@tdstrp32 *.dll

@tdstrip *.exe
@tdstrp32 *.exe

#pkzip backup.zip *.*

@echo ##### Work complete #####
